###########################################
## 0.masterRun.R
## This script runs our replication in full
## Last update: SR 15 Mar 2022
###########################################


  ## Load requisite packages
  
    #install.packages("pacman") ## comment out if pacman already installed
  
  ## Load packages - all script dependencies for cleaning, here.
  
    pacman::p_load(tidyverse, rio, unheadr, vroom, GGally,
                   ggthemes, ggsci, modelsummary, fixest, 
                   bacondecomp, geomtextpath, kableExtra, gtsummary)


  ## Pull in clean survey data from main repo
  
    dat <- readRDS('data/survey_data_for_analysis.Rda')

  ## Read in demographic dataset
  
    demo_dat <- readRDS('data/demographic_survey_data.Rda')
    
  ## Run analysis -- all OLS regressions and create OLS Table 1
    
    source('code/1.runAnalyses.R')
    
  ## Create appendix exhibits from analysis output -- Table A1, Figures A2 & A3
    
    source('code/2.createAppendixExhibits.R')
    